home *** CD-ROM | disk | FTP | other *** search
/ Almathera Ten Pack 3: CDPD 3 / Almathera Ten on Ten - Disc 3: CDPD3.iso / scope / 001-025 / scopedisk9 / dmouse106 / dmouse.c < prev    next >
C/C++ Source or Header  |  1995-03-18  |  6KB  |  217 lines
  1.  
  2.  
  3. /*
  4.  *  DMOUSE.C    V1.06    18 May 1988     (Aztec Compile, +L  ... 32 bit ints)
  5.  *                     and link w/ c32.lib
  6.  *
  7.  *  DMOUSE QUIT
  8.  *  DMOUSE -a# -t# -s# -m# -c# -L0 -Rqqqq -A0 -Kcccc -Qqqqq -C cmd
  9.  *
  10.  *  -a#     # = acceleration, default 3.    1 to disable
  11.  *  -t#     # = mouse threshold before acceleration takes effect, def. 0
  12.  *        (in pixels/event)
  13.  *  -s#     # = screen timeout, default 5min,    0 to disable
  14.  *  -m#     # = pointer timeout, default 5 secs,0 to disable
  15.  *  -c#     # = # of clicks to bring window to front
  16.  *  -L0     Disable LeftMouseButton->WindowToFront (LMB+RMB->ToBack)
  17.  *  -L1     Enable it
  18.  *  -Rqqqq  Set qualifier + RMB for Window/ScreenToBack (default LMB)
  19.  *  -A0     Disable Auto-Activate window on mouse move
  20.  *  -A1     Enable it
  21.  *  -Kcccc  Set key code in hex that activates cmd, def is escape
  22.  *  -Qqqqq  Set key qualifier in hex for keycode, def is left-amiga
  23.  *  -C cmd  Set command (must be last option on command line), def NewCli
  24.  *
  25.  *    Note:    The -Q Qualifiers usually must be or'd with x8000
  26.  *    Note:    The -R Qualifier should NOT be or'd with x8000.
  27.  *
  28.  *
  29.  *  To remove, BREAK the CLI it ran under.
  30.  *
  31.  *  TODO:   mouse pointer sometimes gets turned on by intuition
  32.  */
  33.  
  34. #include <stdio.h>
  35. #include "dmouse.h"
  36.  
  37. #define VERSION 6
  38.  
  39. int    Enable_Abort;        /*    CLI break enable    */
  40.  
  41. main(ac, av)
  42. char *av[];
  43. {
  44.     register short i, j, len;
  45.     register long val;
  46.     register char *ptr;
  47.     register DMS  *dms = FindPort(PORTNAME);
  48.     short   exists = (dms != NULL);
  49.     short   create = (dms == NULL);
  50.     short   quit = 0;
  51.  
  52.     Enable_Abort = 0;
  53.     if (create) {
  54.     dms = AllocMem(sizeof(DMS), MEMF_PUBLIC|MEMF_CLEAR);
  55.     dms->Version = VERSION;
  56.     dms->Acc = 3;
  57.     dms->STo = 5*60;
  58.     dms->MTo = 5;
  59.     dms->Code = 0x45;
  60.     dms->Qual = 0x8040;
  61.     dms->RQual= 0x4000;
  62.     dms->Clicks = 1;
  63.     dms->CLeft = dms->Clicks;
  64.     strcpy(dms->Cmd, "newcli");
  65.     dms->LMBEnable = 1;
  66.     dms->AAEnable = 1;
  67.     dms->NoSprData = AllocMem(12, MEMF_PUBLIC|MEMF_CHIP|MEMF_CLEAR);
  68.     dms->NoSprData[0] = 0xFE00;
  69.     dms->NoSprData[1] = 0xFF00;
  70.     }
  71.  
  72.     for (i = 1; i < ac; ++i) {
  73.     ptr = av[i];
  74.     if (strcmp(ptr, "QUIT") == 0 || strcmp(ptr, "quit") == 0) {
  75.         quit = 1;
  76.         create = 0;
  77.         break;
  78.     }
  79.     val = atoi(ptr+2);
  80.     if (*ptr == '-') {
  81.         switch(ptr[1]) {
  82.         case 'a':
  83.         dms->Acc = val;
  84.         break;
  85.         case 'c':
  86.         if (val < 1)
  87.             val = 1;
  88.         dms->Clicks = dms->CLeft = val;
  89.         break;
  90.         case 't':
  91.         dms->AThresh = val;
  92.         break;
  93.         case 's':
  94.         dms->STo = val;
  95.         break;
  96.         case 'm':
  97.         dms->MTo = val;
  98.         break;
  99.         case 'L':
  100.         dms->LMBEnable = val;
  101.         break;
  102.         case 'R':
  103.         dms->RQual = ahtoi(ptr+2);
  104.         break;
  105.         case 'A':
  106.         dms->AAEnable = val;
  107.         break;
  108.         case 'K':
  109.         dms->Code = ahtoi(ptr+2);
  110.         break;
  111.         case 'Q':
  112.         dms->Qual = ahtoi(ptr+2);
  113.         break;
  114.         case 'C':
  115.         for (len = strlen(ptr+2) + 2, j = i + 1; j < ac; ++j)
  116.             len += strlen(av[j]) + 1;
  117.         strcpy(dms->Cmd, ptr + 2);
  118.         for (j = i + 1; j < ac; ++j) {
  119.             if (dms->Cmd[0])
  120.             strcat(dms->Cmd, " ");
  121.             strcat(dms->Cmd, av[j]);
  122.         }
  123.         break;
  124.         default:
  125.         puts("DMOUSE QUIT  or");
  126.         puts("DMOUSE -a# -t# -s# -m# -L0 -Rqqqq -A0 -Kcccc -Qqqqq -C cmd");
  127.         printf("V1.%02d PUBLIC DOMAIN, Matthew Dillon, 14 May 1988\n\n", VERSION);
  128.         puts("  -a#     Acceleration (default 3)");
  129.         puts("  -t#     Accel. threshold (default 0)");
  130.         puts("  -s#     Screen timeout (default 300)");
  131.         puts("  -m#     Mouse timeout (default 5)");
  132.         puts("  -c#     Set # of clicks for wintofront (default 1)");
  133.         puts("  -L0/1   LMB disable/enable (default 1=enabled)");
  134.         puts("  -Rqqqq  RMB qualifier wintoback (default 4000=LMB)");
  135.         puts("  -A0/1   Auto-Activate Window disable/enable");
  136.         puts("  -Kcccc  Command Key Code, default 45 = esc");
  137.         puts("  -Qqqqq  Command Key Qualifier (must | with 8000)");
  138.         puts("  -C cmd  cmd to run, must be last option");
  139.         puts("Note: LMB(or -R qualifier)(hold)+RMB = WindowToBack");
  140.         puts("\n");
  141.         puts("Additionaly, Any option may be modified while DMOUSE is active");
  142.         create = 0;
  143.         break;
  144.         }
  145.     }
  146.     }
  147.     if (!exists && create) {
  148.     PROC *proc;
  149.     printf("Installing DMouse, ");
  150.     fflush(stdout);
  151.     dms->Port.mp_Flags = PA_IGNORE;
  152.     dms->Port.mp_Node.ln_Pri = 0;
  153.     dms->Port.mp_Node.ln_Type= NT_MSGPORT;
  154.     dms->Port.mp_Node.ln_Name= AllocMem(sizeof(PORTNAME), MEMF_PUBLIC);
  155.     strcpy(dms->Port.mp_Node.ln_Name, PORTNAME);
  156.     NewList(&dms->Port.mp_MsgList);
  157.     dms->Segment = LoadSeg("l:DMouse-Handler");
  158.     if (!dms->Segment)
  159.         dms->Segment = LoadSeg("DMouse-Handler");
  160.     if (!dms->Segment) {
  161.         puts("Unable to find L:DMouse-Handler");
  162.         FreeMem(dms->Port.mp_Node.ln_Name, sizeof(PORTNAME));
  163.         create = 0;
  164.     } else {
  165.         AddPort(&dms->Port);
  166.         dms->ShakeTask = FindTask(NULL);
  167.         dms->ShakeSig = AllocSignal(-1);
  168.         proc = CreateProc(dms->Port.mp_Node.ln_Name, 1, dms->Segment, 4096);
  169.         Wait(1 << dms->ShakeSig);
  170.         FreeSignal(dms->ShakeSig);
  171.         exists = 1;
  172.         quit = dms->StartupError;
  173.         if (quit)
  174.         puts("Handler error");
  175.         else
  176.         printf("ok.  DMouse V1.%02d, by Matthew Dillon.  PUBLIC DOMAIN.\n", VERSION);
  177.     }
  178.     }
  179.     if (quit) {
  180.     if (exists) {
  181.         printf("Removing, ");
  182.         fflush(stdout);
  183.         dms->ShakeTask = FindTask(NULL);
  184.         dms->ShakeSig = AllocSignal(-1);
  185.         Signal(dms->HandTask, SBF_C);
  186.         Wait(1 << dms->ShakeSig);
  187.         FreeSignal(dms->ShakeSig);
  188.         RemPort(&dms->Port);
  189.         FreeMem(dms->Port.mp_Node.ln_Name, sizeof(PORTNAME));
  190.         UnLoadSeg(dms->Segment);
  191.         puts("ok");
  192.     }
  193.     exists = 0;
  194.     create = 0;
  195.     }
  196.     if (!exists) {
  197.     FreeMem(dms->NoSprData, 12);
  198.     FreeMem(dms, sizeof(DMS));
  199.     }
  200. }
  201.  
  202. ahtoi(str)
  203. register char *str;
  204. {
  205.     register long val = 0;
  206.     register char c;
  207.     while (c = *str) {
  208.     val <<= 4;
  209.     if (c >= '0' && c <= '9')
  210.         val |= (c & 15);
  211.     else
  212.         val |= (c & 15) + 9;
  213.     ++str;
  214.     }
  215.     return(val);
  216. }
  217.